CAADiameters_TopocentricMoonSemidiameter <-
function(DistanceDelta, Delta, H, Latitude, Height){
.Call("CAADiameters_TopocentricMoonSemidiameter", DistanceDelta, Delta, H, Latitude, Height)
}
